home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 11 / FM Towns Free Software Collection 11.iso / t_os / tool / artemis1 / usrlib / src / gwrtpage.asm < prev    next >
Encoding:
Assembly Source File  |  1994-02-21  |  1.1 KB  |  70 lines
  1. ;    私製ライブラリ・グラフィック篇
  2. ;    (c) MATSUUCHI Ryosuke in Dec,1992
  3. ;
  4. ;    gwrtpage.asm : 画面モードの設定
  5. ;
  6. ;    1992. 7.16(Thu)
  7. ;    1992.12.28(Sun)
  8.  
  9.         public    gwrtpage, _gwrtpage
  10.  
  11.         include    grplib.inc
  12.  
  13.         assume    cs:cseg, ds:dseg
  14.  
  15.  
  16. dseg segment dword 'DATA'
  17. dseg ends
  18.  
  19.  
  20.  
  21. cseg segment dword 'CODE'
  22.  
  23. ;---------------------------------------------------------------
  24. ;    _gwrtpage : 
  25. ;        in eax : ページ番号
  26. ;                 ビット７を立てると、仮想画面への
  27. ;             書き込みとなる。
  28. ;
  29. ;    gwrtpage(int page);
  30. ;---------------------------------------------------------------
  31.  
  32. gwrtpage    proc
  33.         mov    eax,[esp+4]
  34.         call    _gwrtpage
  35.         ret
  36. gwrtpage    endp
  37.  
  38.  
  39.  
  40. _gwrtpage    proc
  41.         push    eax
  42.         push    ebx
  43.         mov    [_wrtpage],eax
  44.         bt    eax,7
  45.         jc    #0
  46.             ;書き込みページは実画面
  47.             mov    ebx,[_scrmod+eax*4]
  48.             mov    [_nowscrmod],ebx
  49.             mov    ebx,eax
  50.             mov    ah,05h
  51.             mov    al,bl
  52.             call    _callEGB
  53.             jmp    #1
  54.         #0:
  55.             ;書き込みページは仮想画面
  56.             and    eax,7fh
  57.             mov    ebx,[_vscrmod+eax*4]
  58.             mov    [_nowscrmod],ebx
  59.         #1:
  60.         pop    ebx
  61.         pop    eax
  62.         ret
  63. _gwrtpage    endp
  64.  
  65.  
  66.  
  67. cseg ends
  68.  
  69. end
  70.